(rmail-insert-inbox-text): Pass proper format string to message.

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index f8592223a96a7ab7c810d8ce629d4c99c48c6907..a63e9de63232733df568fb7b4af3662cd85b4c28 100644 (file)
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -1033,9 +1033,9 @@ It returns t if it got any new messages."
                       (if (looking-at "movemail: ")
                           (delete-region (point-min) (match-end 0)))
                       (beep t)
-                      (message (concat "movemail: "
-                                       (buffer-substring (point-min)
-                                                         (point-max))))
+                      (message "movemail: %s"
+                               (buffer-substring (point-min)
+                                                 (point-max)))
                       (sit-for 3)
                       nil))
                 (if errors (kill-buffer errors))))))